r remove rows with all 0. There are any references about r remove rows with all 0 in here. you can look below.